home *** CD-ROM | disk | FTP | other *** search
/ Pascal Super Library / Pascal Super Library (CW International)(1997).bin / DELPHI32 / COMPNENT / SAWIN95 / HKTEST.DFM / HKTEST.txt
Text File  |  1996-10-28  |  1KB  |  61 lines

  1. object Form1: TForm1
  2.   Left = 202
  3.   Top = 107
  4.   Width = 393
  5.   Height = 174
  6.   BorderIcons = [biSystemMenu]
  7.   Caption = 'TSysHotKey demonstration'
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   OnCreate = FormCreate
  13.   PixelsPerInch = 96
  14.   TextHeight = 13
  15.   object Label1: TLabel
  16.     Left = 12
  17.     Top = 8
  18.     Width = 363
  19.     Height = 39
  20.     Caption = 
  21.       'Try to close this window using either Alt+F4 or opening the syst' +
  22.       'em menu with Alt+Space. You won'#39't succeed because these keys hav' +
  23.       'e been redefined using the TSysHotKey component. '
  24.     WordWrap = True
  25.   end
  26.   object Label2: TLabel
  27.     Left = 12
  28.     Top = 60
  29.     Width = 340
  30.     Height = 26
  31.     Caption = 
  32.       'As a matter of fact, you won'#39't be able to close any program usin' +
  33.       'g Alt+F4 when this program is active. These hotkeys are system-w' +
  34.       'ide.'
  35.     WordWrap = True
  36.   end
  37.   object Label3: TLabel
  38.     Left = 12
  39.     Top = 100
  40.     Width = 278
  41.     Height = 13
  42.     Caption = 'P.S. The PrintScreen key also has been redefined..............'
  43.   end
  44.   object CheckBox1: TCheckBox
  45.     Left = 12
  46.     Top = 120
  47.     Width = 269
  48.     Height = 17
  49.     Caption = '<---- Click here to activate or deactivate the hotkeys'
  50.     State = cbChecked
  51.     TabOrder = 0
  52.     OnClick = CheckBox1Click
  53.   end
  54.   object SysHotKey1: TSysHotKey
  55.     Active = True
  56.     OnHotKey = SysHotKey1HotKey
  57.     Left = 352
  58.     Top = 88
  59.   end
  60. end
  61.